-- background: 2619 from stack: in.1
-- bmap block id: 7386
-- flags: 0000
-- background id: 0
-- name: 
----- HyperTalk script -----
on openCard
  resetCard
end openCard

on resetCard
  put field "Reset" into field "Script Window"
  put empty into field "Result"
  set script of bkgnd button "Test Button" to field "Script Window"
  set the scroll of field "instructions" to 1
  play "bell" ee ee
end resetCard



-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=471 top=301 right=333 bottom=502
-- title width / last selected line: 0
-- icon id / first selected line: 27009 / 27009
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
  go to next card
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=8 top=302 right=333 bottom=40
-- title width / last selected line: 0
-- icon id / first selected line: 9301 / 9301
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
  go to prev card
end mouseUp



-- part 6 (field)
-- low flags: 01
-- high flags: 0001
-- rect: left=107 top=29 right=58 bottom=418
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 18
-- style flags: 0
-- line height: 24
-- part name: Title


-- part 9 (field)
-- low flags: 00
-- high flags: 0007
-- rect: left=144 top=195 right=324 bottom=472
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: Script Window
----- HyperTalk script -----
on openField
  play "bell" e6t
end openField



-- part 10 (field)
-- low flags: 01
-- high flags: 0007
-- rect: left=47 top=63 right=169 bottom=474
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name: Instructions


-- part 13 (field)
-- low flags: 81
-- high flags: 0000
-- rect: left=461 top=52 right=73 bottom=485
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Reset


-- part 14 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=473 top=240 right=265 bottom=499
-- title width / last selected line: 0
-- icon id / first selected line: 21700 / 21700
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Home
----- HyperTalk script -----
on mouseUp
  visual effect iris close
  go "home"
end mouseUp



-- part 17 (button)
-- low flags: 80
-- high flags: A002
-- rect: left=480 top=52 right=71 bottom=492
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: S
----- HyperTalk script -----
on mouseUp
  put field "Script Window" into field "Reset"
end mouseUp



-- part 19 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=45 top=178 right=204 bottom=138
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Test Button
----- HyperTalk script -----
on mouseUp
  play "boing"
end mouseUp




-- part 20 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=479 top=28 right=46 bottom=498
-- title width / last selected line: 0
-- icon id / first selected line: 1015 / 1015
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: Reset Card
----- HyperTalk script -----
on mouseUp
  resetCard
end mouseUp



-- part 21 (button)
-- low flags: 00
-- high flags: A002
-- rect: left=52 top=212 right=257 bottom=129
-- title width / last selected line: 0
-- icon id / first selected line: 29019 / 29019
-- text alignment: 1
-- font id: 3
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Send To Button
----- HyperTalk script -----
on mouseUp
  play "bell" c6t ct
  set script of bkgnd button "Test Button" to field "Script Window"
end mouseUp



-- part 22 (button)
-- low flags: 80
-- high flags: A006
-- rect: left=481 top=65 right=83 bottom=511
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: H
----- HyperTalk script -----
on mouseUp
  If visible of bkgnd button "S" is true then
    hide bkgnd button "S"
    set lockText of field "Instructions" to true
    set lockText of field "Title" to true
  else
    show bkgnd button "S"
    set lockText of field "Instructions" to false
    set lockText of field "Title" to false
  end if
end mouseUp



-- part 24 (field)
-- low flags: 00
-- high flags: 0004
-- rect: left=46 top=276 right=323 bottom=136
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Result


-- part 27 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=472 top=270 right=293 bottom=498
-- title width / last selected line: 0
-- icon id / first selected line: 1012 / 1012
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  visual wipe right
  go to first card
end mouseUp



-- part 28 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=473 top=207 right=233 bottom=501
-- title width / last selected line: 0
-- icon id / first selected line: 25002 / 25002
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Card Help
----- HyperTalk script -----
on mouseUp
  play "Harpsichord" tempo 380 aq cq bq
  visual zoom open
  go to card id 6823
end mouseUp